home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTTextReplace.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  2.2 KB  |  66 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTTextReplace.pas' rev: 3.00
  6.  
  7. #ifndef AHMTTextReplaceHPP
  8. #define AHMTTextReplaceHPP
  9. #include <AHMSystem.hpp>
  10. #include <Classes.hpp>
  11. #include <Messages.hpp>
  12. #include <Windows.hpp>
  13. #include <SysUtils.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmttextreplace
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. typedef void __fastcall (__closure *TAHMBeforeWrite)(System::TObject* Sender, System::AnsiString &Line
  23.     , int LineNo, bool &WriteLine);
  24.  
  25. class DELPHICLASS TAHMTextReplace;
  26. class PASCALIMPLEMENTATION TAHMTextReplace : public Ahmsystem::TAHMSystemsComponent 
  27. {
  28.     typedef Ahmsystem::TAHMSystemsComponent inherited;
  29.     
  30. private:
  31.     int FLineNumber;
  32.     TAHMBeforeWrite FBeforeWrite;
  33.     System::AnsiString FFileTo;
  34.     System::AnsiString FFileFrom;
  35.     System::AnsiString FLine;
  36.     int FNoOfLinesOnly;
  37.     bool FBusyWriting;
  38.     bool FUseNoOfLines;
  39.     
  40. public:
  41.     __fastcall virtual TAHMTextReplace(Classes::TComponent* AOwner);
  42.     bool __fastcall Execute(void);
  43.     void __fastcall AddNewString(System::AnsiString MyNewString);
  44.     __property int LineNo = {read=FLineNumber, nodefault};
  45.     __property System::AnsiString Line = {read=FLine};
  46.     
  47. __published:
  48.     __property System::AnsiString FileFrom = {read=FFileFrom, write=FFileFrom};
  49.     __property System::AnsiString FileTo = {read=FFileTo, write=FFileTo};
  50.     __property TAHMBeforeWrite BeforeWrite = {read=FBeforeWrite, write=FBeforeWrite};
  51.     __property bool UseNoOfLines = {read=FUseNoOfLines, write=FUseNoOfLines, default=0};
  52.     __property int NoOfLinesOnly = {read=FNoOfLinesOnly, write=FNoOfLinesOnly, nodefault};
  53. public:
  54.     /* TComponent.Destroy */ __fastcall virtual ~TAHMTextReplace(void) { }
  55.     
  56. };
  57.  
  58. //-- var, const, procedure ---------------------------------------------------
  59.  
  60. }    /* namespace Ahmttextreplace */
  61. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  62. using namespace Ahmttextreplace;
  63. #endif
  64. //-- end unit ----------------------------------------------------------------
  65. #endif    // AHMTTextReplace
  66.